home *** CD-ROM | disk | FTP | other *** search
/ Skunkware 5 / Skunkware 5.iso / src / X11 / tclMotif-1.4 / programs / prog112 < prev    next >
Text File  |  1995-06-29  |  424b  |  21 lines
  1. # simple pushButton test
  2.  
  3. xtAppInitialize -class Program
  4.  
  5. xmMainWindow .main managed
  6.  
  7. xmRowColumn .main.f managed
  8. xmScrolledText .main.f.t managed \
  9.     -value "text 1"
  10. xmScrolledText .main.f.t2 managed \
  11.     -value "text 2"
  12.  
  13. .main.f.t overrideTranslations "<Btn3Down> : action(puts %event)"
  14. .main.f.t2 augmentTranslations "<Btn3Down> : action(puts %event)"
  15.  
  16.  
  17. .main setValues -workWindow .main.f
  18. . realizeWidget
  19.  
  20. . mainLoop
  21.